home *** CD-ROM | disk | FTP | other *** search
/ Power Bytes: Money & Finance / PowerBytes Money and Finance CD-ROM 01 / PowerBytes Money and Finance CD-ROM 01.iso / MacII / JuliaSet / JuliaSet.r < prev    next >
Encoding:
Text File  |  1988-04-09  |  5.6 KB  |  307 lines  |  [TEXT/ttxt]

  1. #include "Types.r"
  2.  
  3. resource 'DITL' (128) {
  4.     {    /* array DITLarray: 2 elements */
  5.         /* [1] */
  6.         {122, 190, 146, 262},
  7.         Button {
  8.             enabled,
  9.             "Oh Well.."
  10.         },
  11.         /* [2] */
  12.         {54, 8, 105, 299},
  13.         StaticText {
  14.             disabled,
  15.             "Fractal5 needs at least 16 colors (or sh"
  16.             "ades of gray) to run. Please change the "
  17.             "monitor settings with the \"Control Panel"
  18.             "\" DA."
  19.         }
  20.     }
  21. };
  22.  
  23. resource 'DITL' (129) {
  24.     {    /* array DITLarray: 2 elements */
  25.         /* [1] */
  26.         {8, 16, 43, 276},
  27.         StaticText {
  28.             disabled,
  29.             "No theory is good except on condition th"
  30.             "at one use it to go beyond."
  31.         },
  32.         /* [2] */
  33.         {69, 167, 86, 246},
  34.         StaticText {
  35.             disabled,
  36.             "AndrÄ Gide"
  37.         }
  38.     }
  39. };
  40.  
  41. resource 'DITL' (130) {
  42.     {    /* array DITLarray: 11 elements */
  43.         /* [1] */
  44.         {176, 208, 196, 268},
  45.         Button {
  46.             enabled,
  47.             "OK"
  48.         },
  49.         /* [2] */
  50.         {176, 288, 196, 348},
  51.         Button {
  52.             enabled,
  53.             "Cancel"
  54.         },
  55.         /* [3] */
  56.         {88, 32, 104, 112},
  57.         EditText {
  58.             disabled,
  59.             "0.32000000"
  60.         },
  61.         /* [4] */
  62.         {88, 140, 104, 220},
  63.         EditText {
  64.             disabled,
  65.             "0.04300000"
  66.         },
  67.         /* [5] */
  68.         {88, 264, 104, 296},
  69.         EditText {
  70.             disabled,
  71.             "256"
  72.         },
  73.         /* [6] */
  74.         {64, 16, 80, 120},
  75.         StaticText {
  76.             disabled,
  77.             "Horizontal Seed"
  78.         },
  79.         /* [7] */
  80.         {64, 136, 80, 224},
  81.         StaticText {
  82.             disabled,
  83.             "Vertical Seed"
  84.         },
  85.         /* [8] */
  86.         {64, 240, 80, 320},
  87.         StaticText {
  88.             disabled,
  89.             "Depth Limit"
  90.         },
  91.         /* [9] */
  92.         {0, 40, 48, 320},
  93.         StaticText {
  94.             disabled,
  95.             "     Julia Set Fractal drawing program\nR"
  96.             "ay Sanders, Green Grass Software, Inc.\n "
  97.             "   P.O.Box 570, Dunedin FL 34697-0570"
  98.         },
  99.         /* [10] */
  100.         {176, 40, 192, 112},
  101.         StaticText {
  102.             disabled,
  103.             "ver 5.1b0"
  104.         },
  105.         /* [11] */
  106.         {208, 40, 240, 328},
  107.         StaticText {
  108.             disabled,
  109.             "If you like this program, please send $5"
  110.             " to encourage the development of more li"
  111.             "ke it."
  112.         }
  113.     }
  114. };
  115.  
  116. resource 'DLOG' (129) {
  117.     {48, 22, 154, 306},
  118.     dBoxProc,
  119.     visible,
  120.     noGoAway,
  121.     0x0,
  122.     129,
  123.     ""
  124. };
  125.  
  126. resource 'DLOG' (130) {
  127.     {48, 14, 294, 378},
  128.     documentProc,
  129.     visible,
  130.     noGoAway,
  131.     0x0,
  132.     130,
  133.     "Julia Set parameters"
  134. };
  135.  
  136. resource 'clut' (128, "16 std colors") {
  137.     0x80,
  138.     -32768,
  139.     {    /* array ColorSpec: 16 elements */
  140.         /* [1] */
  141.         0, 65535, 65535, 65535,
  142.         /* [2] */
  143.         1, 64512, 62333, 1327,
  144.         /* [3] */
  145.         2, 65535, 25738, 652,
  146.         /* [4] */
  147.         3, 56683, 2242, 1698,
  148.         /* [5] */
  149.         4, 62167, 2134, 34028,
  150.         /* [6] */
  151.         5, 18147, 0, 42302,
  152.         /* [7] */
  153.         6, 0, 0, 54272,
  154.         /* [8] */
  155.         7, 577, 43860, 60159,
  156.         /* [9] */
  157.         8, 7969, 46995, 5169,
  158.         /* [10] */
  159.         9, 0, 25775, 4528,
  160.         /* [11] */
  161.         10, 22016, 11421, 1316,
  162.         /* [12] */
  163.         11, 37079, 29024, 14900,
  164.         /* [13] */
  165.         12, 49152, 49152, 49152,
  166.         /* [14] */
  167.         13, 32768, 32768, 32768,
  168.         /* [15] */
  169.         14, 16384, 16384, 16384,
  170.         /* [16] */
  171.         15, 0, 0, 0
  172.     }
  173. };
  174.  
  175. resource 'wctb' (0, "app wind colors") {
  176.     0x0,
  177.     0,
  178.     {    /* array ColorSpec: 5 elements */
  179.         /* [1] */
  180.         wFrameColor, 0, 0, 0,
  181.         /* [2] */
  182.         wTextColor, 56683, 2242, 1698,
  183.         /* [3] */
  184.         wContentColor, 65535, 65535, 65535,
  185.         /* [4] */
  186.         wHiliteColor, 0, 0, 0,
  187.         /* [5] */
  188.         wTitleBarColor, 65535, 65535, 65535
  189.     }
  190. };
  191.  
  192. resource 'dctb' (129, "dlog wind colors") {
  193.     0x0,
  194.     0,
  195.     {    /* array ColorSpec: 5 elements */
  196.         /* [1] */
  197.         wFrameColor, 0, 0, 0,
  198.         /* [2] */
  199.         wTextColor, 56683, 2242, 1698,
  200.         /* [3] */
  201.         wContentColor, 64512, 62333, 1327,
  202.         /* [4] */
  203.         wHiliteColor, 0, 0, 0,
  204.         /* [5] */
  205.         wTitleBarColor, 65535, 65535, 65535
  206.     }
  207. };
  208.  
  209. resource 'dctb' (130, "dlog wind colors") {
  210.     0x0,
  211.     0,
  212.     {    /* array ColorSpec: 5 elements */
  213.         /* [1] */
  214.         wFrameColor, 0, 0, 0,
  215.         /* [2] */
  216.         wTextColor, 56683, 2242, 1698,
  217.         /* [3] */
  218.         wContentColor, 65535, 65535, 65535,
  219.         /* [4] */
  220.         wHiliteColor, 0, 0, 0,
  221.         /* [5] */
  222.         wTitleBarColor, 65535, 65535, 65535
  223.     }
  224. };
  225.  
  226. resource 'ALRT' (128) {
  227.     {34, 50, 188, 358},
  228.     128,
  229.     {    /* array: 4 elements */
  230.         /* [1] */
  231.         OK, visible, silent,
  232.         /* [2] */
  233.         OK, visible, silent,
  234.         /* [3] */
  235.         OK, visible, silent,
  236.         /* [4] */
  237.         OK, visible, silent
  238.     }
  239. };
  240.  
  241. data 'SIZE' (-1) {
  242.     $"5000 0000 61A8 0000 61A8"                       /* P...a¿..a¿ */
  243. };
  244.  
  245. resource 'BNDL' (128) {
  246.     'GGSj',
  247.     0,
  248.     {    /* array TypeArray: 2 elements */
  249.         /* [1] */
  250.         'ICN#',
  251.         {    /* array IDArray: 1 elements */
  252.             /* [1] */
  253.             0, 128
  254.         },
  255.         /* [2] */
  256.         'FREF',
  257.         {    /* array IDArray: 1 elements */
  258.             /* [1] */
  259.             0, 128
  260.         }
  261.     }
  262. };
  263.  
  264. resource 'FREF' (128) {
  265.     'APPL',
  266.     0,
  267.     ""
  268. };
  269.  
  270. data 'GGSj' (0) {
  271.     $"5F4A 756C 6961 5365 7420 4672 6163 7461"        /* _JuliaSet Fracta */
  272.     $"6C20 6472 6177 696E 6773 2076 6572 2035"        /* l drawings ver 5 */
  273.     $"2E31 6230 2C20 A920 3139 3837 2C20 3139"        /* .1b0, ⌐ 1987, 19 */
  274.     $"3838 2047 7265 656E 2047 7261 7373 2053"        /* 88 Green Grass S */
  275.     $"6F66 7477 6172 652C 2049 6E63 2E2C 2054"        /* oftware, Inc., T */
  276.     $"6869 7320 6973 2073 6861 7265 7761 7265"        /* his is shareware */
  277. };
  278.  
  279. data 'CODE' (0, purgeable) {
  280.     $"0000 0028 0000 0200 0000 0008 0000 0020"        /* ...(...........  */
  281.     $"0000 3F3C 0001 A9F0"                            /* ..?<..⌐. */
  282. };
  283.  
  284. resource 'ICN#' (128) {
  285.     {    /* array: 2 elements */
  286.         /* [1] */
  287.         $"FFFF FFFF FC05 5555 FE00 AAAB FF00 0555"
  288.         $"FFC0 02AB FFF0 0155 BFFE 00AB 9EFF C055"
  289.         $"8FFF FC2B 8F9F FE15 8787 FF0B 87C0 FF05"
  290.         $"83C0 1F03 C3E4 0F05 83E1 0F83 C1E2 8F85"
  291.         $"A1F1 4783 C1F0 87C1 A0F0 27C3 C0F8 03C1"
  292.         $"A0FF 03E1 D0FF E1E1 A87F F9F1 D43F FFF1"
  293.         $"AA03 FF79 D500 7FFD AA80 0FFF D540 03FF"
  294.         $"AAA0 00FF D555 007F AAAA A03F FFFF FFFF",
  295.         /* [2] */
  296.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  297.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  298.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  299.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  300.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  301.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  302.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  303.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  304.     }
  305. };
  306.  
  307.